home *** CD-ROM | disk | FTP | other *** search
/ Delphi Magazine Collection 2001 / Delphi Magazine Collection 20001 (2001).iso / DISKS / Issue41 / Clinic / ModalU.dfm / ModalU.txt
Encoding:
Text File  |  1998-11-17  |  1.0 KB  |  48 lines
  1. object Form1: TForm1
  2.   Left = 298
  3.   Top = 204
  4.   BorderIcons = [biMinimize, biMaximize]
  5.   BorderStyle = bsNone
  6.   Caption = 'Press the Modal buttonto make a Win32 "modal" window'
  7.   ClientHeight = 100
  8.   ClientWidth = 465
  9.   Color = clBtnFace
  10.   Font.Charset = DEFAULT_CHARSET
  11.   Font.Color = clWindowText
  12.   Font.Height = -11
  13.   Font.Name = 'MS Sans Serif'
  14.   Font.Style = []
  15.   OldCreateOrder = True
  16.   WindowState = wsMaximized
  17.   OnClose = FormClose
  18.   PixelsPerInch = 96
  19.   TextHeight = 13
  20.   object Label1: TLabel
  21.     Left = 8
  22.     Top = 16
  23.     Width = 449
  24.     Height = 13
  25.     Alignment = taCenter
  26.     AutoSize = False
  27.     Caption = 
  28.       'Press a key (including system keystrokes) and this label will di' +
  29.       'splay info on the key'
  30.   end
  31.   object Button1: TSpeedButton
  32.     Left = 128
  33.     Top = 56
  34.     Width = 75
  35.     Height = 25
  36.     Caption = 'Modal'
  37.     OnClick = Button1Click
  38.   end
  39.   object Button2: TSpeedButton
  40.     Left = 248
  41.     Top = 56
  42.     Width = 75
  43.     Height = 25
  44.     Caption = 'Nonmodal'
  45.     OnClick = Button2Click
  46.   end
  47. end
  48.